(Electric-pop-up-window): For the `one-window' case,
authorThien-Thi Nguyen <ttn@gnuvola.org>
Sat, 13 Sep 2003 13:51:57 +0000 (13:51 +0000)
committerThien-Thi Nguyen <ttn@gnuvola.org>
Sat, 13 Sep 2003 13:51:57 +0000 (13:51 +0000)
no longer disconcertingly move point in the original buffer.

lisp/electric.el

index 776a99035cc916accda95aa3668a7bfca7040cab..6df74eac6efac747f8a6f583447d3050f2645c1a 100644 (file)
       (cond ((and (eq (window-buffer win) buf))
             (select-window win))
            (one-window
-            (goto-char (window-start win))
             (pop-to-buffer buffer)
             (setq win (selected-window))
             (enlarge-window (- target-height (window-height win))))